/*M///////////////////////////////////////////////////////////////////////////////////////
//
//  IMPORTANT: READ BEFORE DOWNLOADING, COPYING, INSTALLING OR USING.
//
//  By downloading, copying, installing or using the software you agree to this license.
//  If you do not agree to this license, do not download, install,
//  copy or use the software.
//
//
//                        Intel License Agreement
//                For Open Source Computer Vision Library
//
// Copyright (C) 2000, Intel Corporation, all rights reserved.
// Third party copyrights are property of their respective owners.
//
// Redistribution and use in source and binary forms, with or without modification,
// are permitted provided that the following conditions are met:
//
//   * Redistribution's of source code must retain the above copyright notice,
//     this list of conditions and the following disclaimer.
//
//   * Redistribution's in binary form must reproduce the above copyright notice,
//     this list of conditions and the following disclaimer in the documentation
//     and/or other materials provided with the distribution.
//
//   * The name of Intel Corporation may not be used to endorse or promote products
//     derived from this software without specific prior written permission.
//
// This software is provided by the copyright holders and contributors "as is" and
// any express or implied warranties, including, but not limited to, the implied
// warranties of merchantability and fitness for a particular purpose are disclaimed.
// In no event shall the Intel Corporation or contributors be liable for any direct,
// indirect, incidental, special, exemplary, or consequential damages
// (including, but not limited to, procurement of substitute goods or services;
// loss of use, data, or profits; or business interruption) however caused
// and on any theory of liability, whether in contract, strict liability,
// or tort (including negligence or otherwise) arising in any way out of
// the use of this software, even if advised of the possibility of such damage.
//
//M*/

// Authors: Konstantin Dols <dols@ient.rwth-aachen.de>
//          Mark Asbach <asbach@ient.rwth-aachen.de>
//
//          Institute of Communications Engineering
//          RWTH Aachen University


#include "precomp.hpp"

// required to enable some functions used here...
#define XINE_ENABLE_EXPERIMENTAL_FEATURES

#include <cassert>

extern "C"
{
#include <xine.h>
	//#include <xine/xineutils.h>

	// forward declaration from <xine/xineutils.h>
	const char* xine_get_homedir( void );
}

typedef struct CvCaptureAVI_XINE {
	/// method call table
	xine_t* xine;
	xine_stream_t* stream;
	xine_video_port_t* vo_port;

	/// frame returned by xine_get_next_video_frame()
	xine_video_frame_t xine_frame;

	IplImage*	 yuv_frame;
	IplImage*	 bgr_frame;

	/// image dimansions of the input stream.
	CvSize	size;

	/// framenumber of the last frame received from xine_get_next_video_frame().
	/// note: always keep this value updated !!!!
	int	frame_number;

	/// framerate of the opened stream
	double	frame_rate;

	/// duration of a frame in stream
	double	frame_duration;

	/// indicated if input is seekable
	bool	seekable;

}
CvCaptureAVI_XINE;


// 4:2:2 interleaved -> BGR
static void icvYUY2toBGR( CvCaptureAVI_XINE* capture ) {
	uint8_t* v	= capture->xine_frame.data;
	int offset;
	for ( int y = 0; y < capture->yuv_frame->height; y++ ) {
		offset	= y * capture->yuv_frame->widthStep;

		for ( int x = 0; x < capture->yuv_frame->width; x++, offset += 3 ) {
			capture->yuv_frame->imageData[ offset + 1 ] = v[ 3 ];
			capture->yuv_frame->imageData[ offset + 2 ] = v[ 1 ];
			if ( x & 1 ) {
				capture->yuv_frame->imageData[ offset ] = v[ 2 ];
				v += 4;
			} else {
				capture->yuv_frame->imageData[ offset ] = v[ 0 ];
			}
		}
	}

	// convert to BGR
	cvCvtColor( capture->yuv_frame, capture->bgr_frame, CV_YCrCb2BGR );
}


// 4:2:0 planary -> BGR
static void icvYV12toBGR( CvCaptureAVI_XINE* capture ) {
	IplImage* yuv	= capture->yuv_frame;
	int	w_Y	= capture->size.width;
	int	h_Y	= capture->size.height;

	int	w_UV	= w_Y >> 1;

	int	size_Y	= w_Y * h_Y;
	int	size_UV	= size_Y / 4;

	int	line	= yuv->widthStep;

	uint8_t* addr_Y = capture->xine_frame.data;
	uint8_t* addr_U = addr_Y + size_Y;
	uint8_t* addr_V = addr_U + size_UV;

	// YYYY..UU.VV. -> BGRBGRBGR...
	for ( int y = 0; y < h_Y; y++ ) {
		int offset = y * line;
		for ( int x = 0; x < w_Y; x++, offset += 3 ) {
			/*
			if ( x&1 )
			{
				addr_U++; addr_V++;
			}
			*/
			int one_zero = x & 1;
			addr_U += one_zero;
			addr_V += one_zero;

			yuv->imageData[ offset ] = *( addr_Y++ );
			yuv->imageData[ offset + 1 ] = *addr_U;
			yuv->imageData[ offset + 2 ] = *addr_V;
		}

		if ( y & 1 ) {
			addr_U -= w_UV;
			addr_V -= w_UV;
		}
	}

	/* convert to BGR */
	cvCvtColor( capture->yuv_frame, capture->bgr_frame, CV_YCrCb2BGR );
}

static void icvCloseAVI_XINE( CvCaptureAVI_XINE* capture ) {
	xine_free_video_frame( capture->vo_port, &capture->xine_frame );

	if ( capture->yuv_frame ) { cvReleaseImage( &capture->yuv_frame ); }
	if ( capture->bgr_frame ) { cvReleaseImage( &capture->bgr_frame ); }

	xine_close( capture->stream );
	//	xine_dispose( capture->stream );

	if ( capture->vo_port ) { xine_close_video_driver( capture->xine, capture->vo_port ); }

	xine_exit( capture->xine );
}


/**
 * CHECKS IF THE STREAM IN * capture IS SEEKABLE.
**/
static void icvCheckSeekAVI_XINE( CvCaptureAVI_XINE* capture ) {
	OPENCV_ASSERT ( capture,                        "icvCheckSeekAVI_XINE( CvCaptureAVI_XINE* )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvCheckSeekAVI_XINE( CvCaptureAVI_XINE* )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvCheckSeekAVI_XINE( CvCaptureAVI_XINE* )", "illegal capture->vo_port");

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvCheckSeekAVI_XINE ... start\n" );
#endif

	// temp. frame for testing.
	xine_video_frame_t tmp;
	// try to seek to a future frame...
	xine_play( capture->stream, 0, 300 ); /* 300msec */
	// try to receive the frame...
	xine_get_next_video_frame( capture->vo_port, &tmp );
	// if the framenumber is still 0, we can't use the xine seek functionality
	capture->seekable = ( tmp.frame_number != 0 );
	// reset stream
	xine_play( capture->stream, 0, 0 );
	// release xine_frame
	xine_free_video_frame( capture->vo_port, &tmp );

#ifndef NDEBUG
	if ( capture->seekable ) {
		fprintf( stderr, "(DEBUG) icvCheckSeekAVI_XINE: Input is seekable, using XINE seek implementation.\n" );
	} else {
		fprintf( stderr, "(DEBUG) icvCheckSeekAVI_XINE: Input is NOT seekable, using fallback function.\n" );
	}

	fprintf( stderr, "(DEBUG) icvCheckSeekAVI_XINE ... end\n" );
#endif
}


static int icvOpenAVI_XINE( CvCaptureAVI_XINE* capture, const char* filename ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvOpenAVI_XINE ... start\n" );
#endif

	char configfile[ 2048 ];

	capture->xine = xine_new();
	sprintf( configfile, "%s%s", xine_get_homedir(), "/.xine/config" );

	xine_config_load( capture->xine, configfile );
	xine_init( capture->xine );

	xine_engine_set_param( capture->xine, 0, 0 );
	capture->vo_port = xine_new_framegrab_video_port( capture->xine );
	if ( capture->vo_port == NULL ) {
		printf( "(ERROR)icvOpenAVI_XINE(): Unable to initialize video driver.\n" );
		return 0;
	}

	capture->stream = xine_stream_new( capture->xine, NULL, capture->vo_port );

	if ( !xine_open( capture->stream, filename ) ) {
		printf( "(ERROR)icvOpenAVI_XINE(): Unable to open source '%s'\n", filename );
		return 0;
	}
	// reset stream...
	xine_play( capture->stream, 0, 0 );


	// initialize some internals...
	capture->frame_number = 0;

	if ( !xine_get_next_video_frame( capture->vo_port, &capture->xine_frame ) ) {
#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) icvOpenAVI_XINE ... failed!\n" );
#endif
		return 0;
	}

	capture->size = cvSize( capture->xine_frame.width, capture->xine_frame.height );
	capture->yuv_frame = cvCreateImage( capture->size, IPL_DEPTH_8U, 3 );
	capture->bgr_frame = cvCreateImage( capture->size, IPL_DEPTH_8U, 3 );

	xine_free_video_frame( capture->vo_port, &capture->xine_frame );
	capture->xine_frame.data[ 0 ] = 0;

	icvCheckSeekAVI_XINE( capture );

	capture->frame_duration = xine_get_stream_info( capture->stream, XINE_STREAM_INFO_FRAME_DURATION ) / 90.;
	capture->frame_rate = 1000 / capture->frame_duration;

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) frame_duration = %f, framerate = %f\n", capture->frame_duration, capture->frame_rate );
#endif

	OPENCV_ASSERT ( capture->yuv_frame,
					"icvOpenAVI_XINE( CvCaptureAVI_XINE *, const char *)", "couldn't create yuv frame");

	OPENCV_ASSERT ( capture->bgr_frame,
					"icvOpenAVI_XINE( CvCaptureAVI_XINE *, const char *)", "couldn't create bgr frame");

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvOpenAVI_XINE ... end\n" );
#endif
	return 1;
}


static int icvGrabFrameAVI_XINE( CvCaptureAVI_XINE* capture ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvGrabFrameAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvGrabFrameAVI_XINE( CvCaptureAVI_XINE * )", "illegal capture");
	OPENCV_ASSERT ( capture->vo_port,
					"icvGrabFrameAVI_XINE( CvCaptureAVI_XINE * )", "illegal capture->vo_port");

	int res = xine_get_next_video_frame( capture->vo_port, &capture->xine_frame );

	/* always keep internal framenumber updated !!! */
	if ( res ) { capture->frame_number++; }

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvGrabFrameAVI_XINE ... end\n" );
#endif
	return res;
}


static const IplImage* icvRetrieveFrameAVI_XINE( CvCaptureAVI_XINE* capture, int ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvRetrieveFrameAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvRetrieveFrameAVI_XINE( CvCaptureAVI_XINE * )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvRetrieveFrameAVI_XINE( CvCaptureAVI_XINE * )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvRetrieveFrameAVI_XINE( CvCaptureAVI_XINE * )", "illegal capture->vo_port");

	/* no frame grabbed yet? so let's do it now! */
	int res = 0;
	if ( capture->xine_frame.data == 0 ) {
		res = icvGrabFrameAVI_XINE( capture );
	} else {
		res = 1;
	}

	if ( res ) {
		switch ( capture->xine_frame.colorspace ) {
		case XINE_IMGFMT_YV12: icvYV12toBGR( capture );
#ifndef NDEBUG
			printf( "(DEBUG)icvRetrieveFrameAVI_XINE: converted YV12 to BGR.\n" );
#endif
			break;

		case XINE_IMGFMT_YUY2: icvYUY2toBGR( capture );
#ifndef NDEBUG
			printf( "(DEBUG)icvRetrieveFrameAVI_XINE: converted YUY2 to BGR.\n" );
#endif
			break;
		case XINE_IMGFMT_XVMC: printf( "(ERROR)icvRetrieveFrameAVI_XINE: XVMC format not supported!\n" );
			break;

		case XINE_IMGFMT_XXMC: printf( "(ERROR)icvRetrieveFrameAVI_XINE: XXMC format not supported!\n" );
			break;

		default: printf( "(ERROR)icvRetrieveFrameAVI_XINE: unknown color/pixel format!\n" );
		}

		/* always release last xine_frame, not needed anymore, but store its frame_number in *capture ! */
		xine_free_video_frame( capture->vo_port, &capture->xine_frame );
		capture->xine_frame.data = 0;

#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) icvRetrieveFrameAVI_XINE ... end\n" );
#endif
		return capture->bgr_frame;
	}

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvRetrieveFrameAVI_XINE ... failed!\n" );
#endif
	return 0;
}


/**
 * THIS FUNCTION IS A FALLBACK FUNCTION FOR THE CASE THAT THE XINE SEEK IMPLEMENTATION
 * DOESN'T WORK WITH THE ACTUAL INPUT. THIS FUNCTION IS ONLY USED IN THE CASE OF AN EMERGENCY,
 * BECAUSE IT IS VERY SLOW !
**/
static int icvOldSeekFrameAVI_XINE( CvCaptureAVI_XINE* capture, int f ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvOldSeekFrameAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvRetricvOldSeekFrameAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvOldSeekFrameAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvOldSeekFrameAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->vo_port");

// not needed tnx to asserts...
	// we need a valid capture context and it's stream to seek through
//	if ( !capture || !capture->stream ) return 0;

	// no need to seek if we are already there...
	if ( f == capture->frame_number ) {
#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) icvOldSeekFrameAVI_XINE ... end\n" );
#endif
		return 1;
	}
	// if the requested position is behind out actual position,
	// we just need to read the remaining amount of frames until we are there.
	else if ( f > capture->frame_number ) {
		for ( ; capture->frame_number < f; capture->frame_number++ )
			/// un-increment framenumber grabbing failed
			if ( !xine_get_next_video_frame( capture->vo_port, &capture->xine_frame ) ) {
				capture->frame_number--;
				break;
			} else {
				xine_free_video_frame( capture->vo_port, &capture->xine_frame );
			}
	}
	// otherwise we need to reset the stream and
	// start reading frames from the beginning.
	else { // f < capture->frame_number
		/// reset stream, should also work with non-seekable input
		xine_play( capture->stream, 0, 0 );
		/// read frames until we are at the requested frame
		for ( capture->frame_number = 0; capture->frame_number < f; capture->frame_number++ )
			/// un-increment last framenumber if grabbing failed
			if ( !xine_get_next_video_frame( capture->vo_port, &capture->xine_frame ) ) {
				capture->frame_number--;
				break;
			} else {
				xine_free_video_frame( capture->vo_port, &capture->xine_frame );
			}
	}


#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvOldSeekFrameAVI_XINE ... end\n" );
#endif
	return ( f == capture->frame_number ) ? 1 : 0;
}


static int icvSeekFrameAVI_XINE( CvCaptureAVI_XINE* capture, int f ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvSeekFrameAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvSeekFrameAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvSeekFrameAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvSeekFrameAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->vo_port");

// not needed tnx to asserts...
	// we need a valid capture context and it's stream to seek through
//	if ( !capture || !capture->stream ) return 0;

	if ( capture->seekable ) {

		/// use xinelib's seek functionality
		int new_time = ( int ) ( ( f + 1 ) * ( float ) capture->frame_duration );

#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) calling xine_play()" );
#endif
		if ( xine_play( capture->stream, 0, new_time ) ) {
#ifndef NDEBUG
			fprintf( stderr, "ok\n" );
			fprintf( stderr, "(DEBUG) icvSeekFrameAVI_XINE ... end\n" );
#endif
			capture->frame_number = f;
			return 1;
		} else {
#ifndef NDEBUG
			fprintf( stderr, "failed\n" );
			fprintf( stderr, "(DEBUG) icvSeekFrameAVI_XINE ... failed\n" );
#endif
			return 0;
		}
	} else {
#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) icvSeekFrameAVI_XINE ... end\n" );
#endif
		return icvOldSeekFrameAVI_XINE( capture, f );
	}
}


static int icvSeekTimeAVI_XINE( CvCaptureAVI_XINE* capture, int t ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvSeekTimeAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvSeekTimeAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvSeekTimeAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvSeekTimeAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->vo_port");

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvSeekTimeAVI_XINE ... start\n" );
#endif

// not needed tnx to asserts...
	// we need a valid capture context and it's stream to seek through
//	if ( !capture || !capture->stream ) return 0;

	if ( capture->seekable ) {
		/// use xinelib's seek functionality
		if ( xine_play( capture->stream, 0, t ) ) {
			capture->frame_number = ( int ) ( ( float ) t * capture->frame_rate / 1000 );
#ifndef NDEBUG
			fprintf( stderr, "(DEBUG) icvSeekFrameAVI_XINE ... end\n" );
#endif
			return 1;
		} else {
#ifndef NDEBUG
			fprintf( stderr, "(DEBUG) icvSeekFrameAVI_XINE ... failed!\n" );
#endif
			return 0;
		}
	} else {
		int new_frame = ( int ) ( ( float ) t * capture->frame_rate / 1000 );
#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) icvSeekFrameAVI_XINE ....end\n" );
#endif
		return icvOldSeekFrameAVI_XINE( capture, new_frame );
	}
}


static int icvSeekRatioAVI_XINE( CvCaptureAVI_XINE* capture, double ratio ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvSeekRatioAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvSeekRatioAVI_XINE( CvCaptureAVI_XINE *, double )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvSeekRatioAVI_XINE( CvCaptureAVI_XINE *, double )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvSeekRatioAVI_XINE( CvCaptureAVI_XINE *, double )", "illegal capture->vo_port");

// not needed tnx to asserts...
	// we need a valid capture context and it's stream to seek through
//	if ( !capture || !capture->stream ) return 0;

	/// ratio must be [0..1]
	if ( ratio > 1 || ratio < 0 ) { return 0; }

	if ( capture->seekable ) {
		// TODO: FIX IT, DOESN'T WORK PROPERLY, YET...!
		int pos_t, pos_l, length;
		xine_get_pos_length( capture->stream, &pos_l, &pos_t, &length );
		fprintf( stderr, "ratio on GetProperty(): %d\n", pos_l );

		/// use xinelib's seek functionality
		if ( xine_play( capture->stream, (int)(ratio*(float)length), 0 ) ) {
			capture->frame_number = ( int ) ( ratio * length / capture->frame_duration );
		} else {
#ifndef NDEBUG
			fprintf( stderr, "(DEBUG) icvSeekRatioAVI_XINE ... failed!\n" );
#endif
			return 0;
		}
	} else {
		/// TODO: fill it !
		fprintf( stderr, "icvSeekRatioAVI_XINE(): Seek not supported by stream !\n" );
		fprintf( stderr, "icvSeekRatioAVI_XINE(): (seek in stream with NO seek support NOT implemented...yet!)\n" );
#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) icvSeekRatioAVI_XINE ... failed!\n" );
#endif
		return 0;
	}

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvSeekRatioAVI_XINE ... end!\n" );
#endif
	return 1;
}


static double icvGetPropertyAVI_XINE( CvCaptureAVI_XINE* capture, int property_id ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvGetPropertyAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvGetPropertyAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvGetPropertyAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvGetPropertyAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->vo_port");
	OPENCV_ASSERT ( capture->xine,
					"icvGetPropertyAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->xine");
	OPENCV_ASSERT ( capture->bgr_frame,
					"icvGetPropertyAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->bgr_frame");

// not needed tnx to asserts...
	// we need a valid capture context and it's stream to seek through
//	if ( !capture || !capture->stream || !capture->bgr_frame || !capture->xine || !capture->vo_port ) return 0

	int pos_t, pos_l, length;
	xine_get_pos_length( capture->stream, &pos_l, &pos_t, &length );
	fprintf( stderr, "ratio on GetProperty(): %i\n", pos_l );

	switch ( property_id ) {
		/// return actual position in msec
	case CV_CAP_PROP_POS_MSEC:
		if ( !capture->seekable ) {
			fprintf( stderr, "(ERROR) GetPropertyAVI_XINE(CV_CAP_PROP_POS_MSEC:\n" );
			fprintf( stderr, "	Stream is NOT seekable, so position info may NOT be valid !!\n" );
		}
		return pos_t;

		/// return actual frame number
	case CV_CAP_PROP_POS_FRAMES:
		/// we insist the capture->frame_number to be remain updated !!!!
		return capture->frame_number;

		/// return actual position ratio in the range [0..1] depending on
		/// the total length of the stream and the actual position
	case CV_CAP_PROP_POS_AVI_RATIO:
		if ( !capture->seekable ) {
			fprintf( stderr, "(ERROR) GetPropertyAVI_XINE(CV_CAP_PROP_POS_AVI_RATIO:\n" );
			fprintf( stderr, "	Stream is NOT seekable, so ratio info may NOT be valid !!\n" );
		}
		if ( length == 0 ) { break; }
		else { return pos_l / 65535; }


		/// return width of image source
	case CV_CAP_PROP_FRAME_WIDTH:
		return capture->size.width;

		/// return height of image source
	case CV_CAP_PROP_FRAME_HEIGHT:
		return capture->size.height;

		/// return framerate of stream
	case CV_CAP_PROP_FPS:
		if ( !capture->seekable ) {
			fprintf( stderr, "(ERROR) GetPropertyAVI_XINE(CV_CAP_PROP_FPS:\n" );
			fprintf( stderr, "	Stream is NOT seekable, so FPS info may NOT be valid !!\n" );
		}
		return capture->frame_rate;

		/// return four-character-code (FOURCC) of source's codec
	case CV_CAP_PROP_FOURCC:
		return ( double ) xine_get_stream_info( capture->stream, XINE_STREAM_INFO_VIDEO_FOURCC );
	}

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvGetPropertyAVI_XINE ... failed!\n" );
#endif

	return 0;
}


static int icvSetPropertyAVI_XINE( CvCaptureAVI_XINE* capture,
								   int property_id, double value ) {
#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvSetPropertyAVI_XINE ... start\n" );
#endif

	OPENCV_ASSERT ( capture,
					"icvSetPropertyAVI_XINE( CvCaptureAVI_XINE *, int, double )", "illegal capture");
	OPENCV_ASSERT ( capture->stream,
					"icvGetPropericvSetPropertyAVI_XINE( CvCaptureAVI_XINE *, int )", "illegal capture->stream");
	OPENCV_ASSERT ( capture->vo_port,
					"icvSetPropertyAVI_XINE( CvCaptureAVI_XINE *, int, double )", "illegal capture->vo_port");

// not needed tnx to asserts...
	// we need a valid capture context and it's stream to seek through
//	if ( !capture || !capture->stream || !capture->bgr_frame || !capture->xine || !capture->vo_port ) return 0

#ifndef NDEBUG
	fprintf( stderr, "(DEBUG) icvSetPropertyAVI_XINE: seeking to value %f ... ", value );
#endif

	switch ( property_id ) {
		/// set (seek to) position in msec
	case CV_CAP_PROP_POS_MSEC:
		return icvSeekTimeAVI_XINE( capture, ( int ) value );

		/// set (seek to) frame number
	case CV_CAP_PROP_POS_FRAMES:
		return icvSeekFrameAVI_XINE( capture, ( int ) value );

		/// set (seek to) position ratio in the range [0..1] depending on
		/// the total length of the stream and the actual position
	case CV_CAP_PROP_POS_AVI_RATIO:
		return icvSeekRatioAVI_XINE( capture, value );

	default:
#ifndef NDEBUG
		fprintf( stderr, "(DEBUG) icvSetPropertyAVI_XINE ... failed!\n" );
#endif

		return 0;
	}
}


static CvCaptureAVI_XINE* icvCaptureFromFile_XINE( const char* filename ) {
	// construct capture struct
	CvCaptureAVI_XINE* capture = ( CvCaptureAVI_XINE* ) cvAlloc ( sizeof ( CvCaptureAVI_XINE ) );
	memset( capture, 0, sizeof ( CvCaptureAVI_XINE ) );

	// initialize XINE
	if ( !icvOpenAVI_XINE( capture, filename ) ) {
		return 0;
	}

	OPENCV_ASSERT ( capture,
					"cvCaptureFromFile_XINE( const char * )", "couldn't create capture");

	return capture;

}



class CvCaptureAVI_XINE_CPP : public CvCapture {
public:
	CvCaptureAVI_XINE_CPP() { captureXINE = 0; }
	virtual ~CvCaptureAVI_XINE_CPP() { close(); }

	virtual bool open( const char* filename );
	virtual void close();

	virtual double getProperty(int);
	virtual bool setProperty(int, double);
	virtual bool grabFrame();
	virtual IplImage* retrieveFrame(int);
protected:

	CvCaptureAVI_XINE* captureXINE;
};

bool CvCaptureAVI_XINE_CPP::open( const char* filename ) {
	close();
	captureXINE = icvCaptureFromFile_XINE(filename);
	return captureXINE != 0;
}

void CvCaptureAVI_XINE_CPP::close() {
	if ( captureXINE ) {
		icvCloseAVI_XINE( captureXINE );
		cvFree( &captureXINE );
	}
}

bool CvCaptureAVI_XINE_CPP::grabFrame() {
	return captureXINE ? icvGrabFrameAVI_XINE( captureXINE ) != 0 : false;
}

IplImage* CvCaptureAVI_XINE_CPP::retrieveFrame(int) {
	return captureXINE ? (IplImage*)icvRetrieveFrameAVI_XINE( captureXINE, 0 ) : 0;
}

double CvCaptureAVI_XINE_CPP::getProperty( int propId ) {
	return captureXINE ? icvGetPropertyAVI_XINE( captureXINE, propId ) : 0;
}

bool CvCaptureAVI_XINE_CPP::setProperty( int propId, double value ) {
	return captureXINE ? icvSetPropertyAVI_XINE( captureXINE, propId, value ) != 0 : false;
}

CvCapture* cvCreateFileCapture_XINE(const char* filename) {
	CvCaptureAVI_XINE_CPP* capture = new CvCaptureAVI_XINE_CPP;

	if ( capture->open(filename)) {
		return capture;
	}

	delete capture;
	return 0;
}


#undef NDEBUG
